Interest- Most of the time: 276, Some of the time: 403, Only now and then: 253, Hardly at all:

Big Business -

Rplot.jpeg
Christians-
christians.jpeg

Fundamentalist Christians -

Fundamentalists.jpeg
Rich People -

Rich.jpeg

Poor People -

Poor.jpeg
Big Business and Christians -

bigbiz v ch.jpeg
Correlation: 0.283902

This shows that as the attitude toward Big Business improves, the attitude towards Christians declines. This continues until good feeling towards Big Business is around 60%, then feelings towards Christians tend to rise with big business.

Big Business and Rich People

bb v rich.jpeg
Correlation: 0.4823454

This shows that as attitudes towards Big Business become friendlier, the public opinion of the Rich also tends to improve.



R Script:
nes<-read.csv("anes2008.csv")
summary(nes$education)
summary(nes$tvnesdays)
summary(nes$bigbiz)
summary(nes$partyid)
summary(nes$race)
boxplot(nes$bigbiz)
boxplot(nes$christians)
summary(nes$interest)
min(nes$bigbiz)
max(nes$bigbiz)
mean(nes$bigbiz)
boxplot(nes$cfundamentals)
boxplot(nes$richppl)
boxplot(nes$poorppl)
scatterplot(nes$bigbiz, nes$christians)
cor(nes$bigbiz, nes$christians, use="complete.obs")
scatterplot(nes$bigbiz, nes$richppl)
cor(nes$bigbiz, nes$richppl, use="complete.obs")
mean(nes$age)
median(nes$tvnewsdays)

Good work for what you got done! But you didn't discuss means, medians, or standard deviations for any of the quantitative variables! That and you could have been far more thorough in explaining the math!